home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / Third Party Demos / Networking / MacMainFrame / card_19995.txt < prev    next >
Text File  |  1989-07-14  |  6KB  |  305 lines
  1. -- card: 19995 from stack: in
  2. -- bmap block id: 17828
  3. -- flags: 0000
  4. -- background id: 2776
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on cardOpen
  8.   put "hide menuBar" into message box
  9.   show message
  10.   returnKey
  11. end cardOpen
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21. -- part 1 (button)
  22. -- low flags: 00
  23. -- high flags: 8000
  24. -- rect: left=178 top=1 right=19 bottom=278
  25. -- title width / last selected line: 0
  26. -- icon id / first selected line: 0 / 0
  27. -- text alignment: 1
  28. -- font id: 0
  29. -- text size: 12
  30. -- style flags: 0
  31. -- line height: 16
  32. -- part name: Function Keys
  33. ----- HyperTalk script -----
  34. on mouseUp
  35.   go card id 17640
  36. end mouseUp
  37.  
  38.  
  39.  
  40. -- part 2 (button)
  41. -- low flags: 00
  42. -- high flags: 8000
  43. -- rect: left=109 top=1 right=19 bottom=175
  44. -- title width / last selected line: 0
  45. -- icon id / first selected line: 0 / 0
  46. -- text alignment: 1
  47. -- font id: 0
  48. -- text size: 12
  49. -- style flags: 0
  50. -- line height: 16
  51. -- part name: Settings
  52. ----- HyperTalk script -----
  53. on mouseUp
  54.   go card id 14235
  55. end mouseUp
  56.  
  57.  
  58.  
  59. -- part 3 (button)
  60. -- low flags: 00
  61. -- high flags: 8000
  62. -- rect: left=70 top=1 right=19 bottom=108
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 0 / 0
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: Edit
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   go card id 19277
  74. end mouseUp
  75.  
  76.  
  77.  
  78.  
  79. -- part 4 (button)
  80. -- low flags: 00
  81. -- high flags: 8000
  82. -- rect: left=34 top=1 right=19 bottom=70
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 1
  86. -- font id: 0
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: File
  91. ----- HyperTalk script -----
  92. on mouseUp
  93.   go to card id 20989
  94. end mouseUp
  95.  
  96.  
  97.  
  98.  
  99. -- part 16 (button)
  100. -- low flags: 00
  101. -- high flags: 0001
  102. -- rect: left=450 top=251 right=279 bottom=488
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 30557 / 30557
  105. -- text alignment: 1
  106. -- font id: 0
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: First
  111. ----- HyperTalk script -----
  112. on mouseUp
  113.   visual effect scroll right
  114.   push card
  115.   go to card id 9514
  116. end mouseUp
  117.  
  118.  
  119.  
  120. -- part 19 (button)
  121. -- low flags: 00
  122. -- high flags: 0004
  123. -- rect: left=450 top=279 right=307 bottom=488
  124. -- title width / last selected line: 0
  125. -- icon id / first selected line: 1012 / 1012
  126. -- text alignment: 1
  127. -- font id: 0
  128. -- text size: 12
  129. -- style flags: 0
  130. -- line height: 16
  131. -- part name: Return
  132. ----- HyperTalk script -----
  133. on mouseUp
  134.   visual effect barn door close
  135.   hide card field id 20
  136.   pop card
  137. end mouseUp
  138.  
  139.  
  140.  
  141. -- part 20 (field)
  142. -- low flags: 81
  143. -- high flags: 2004
  144. -- rect: left=180 top=86 right=224 bottom=482
  145. -- title width / last selected line: 0
  146. -- icon id / first selected line: 0 / 0
  147. -- text alignment: 0
  148. -- font id: 3
  149. -- text size: 12
  150. -- style flags: 0
  151. -- line height: 16
  152. -- part name: 
  153. ----- HyperTalk script -----
  154. on mouseUp
  155.   hide card button id 26
  156.   hide card field id 25
  157.   hide card field id 20
  158. end mouseUp
  159.  
  160.  
  161.  
  162. -- part 21 (button)
  163. -- low flags: 00
  164. -- high flags: 0001
  165. -- rect: left=450 top=251 right=279 bottom=488
  166. -- title width / last selected line: 0
  167. -- icon id / first selected line: 30557 / 30557
  168. -- text alignment: 1
  169. -- font id: 0
  170. -- text size: 12
  171. -- style flags: 0
  172. -- line height: 16
  173. -- part name: First
  174. ----- HyperTalk script -----
  175. on mouseUp
  176.   visual effect scroll right
  177.   push card
  178.   go to card id 9514
  179. end mouseUp
  180.  
  181.  
  182.  
  183. -- part 22 (button)
  184. -- low flags: 00
  185. -- high flags: 0004
  186. -- rect: left=450 top=251 right=279 bottom=488
  187. -- title width / last selected line: 0
  188. -- icon id / first selected line: 30557 / 30557
  189. -- text alignment: 1
  190. -- font id: 0
  191. -- text size: 12
  192. -- style flags: 0
  193. -- line height: 16
  194. -- part name: First
  195. ----- HyperTalk script -----
  196. on mouseUp
  197.   visual effect scroll right
  198.   hide card field id 20
  199.   push card
  200.   go to card id 9514
  201.   show menuBar
  202. end mouseUp
  203.  
  204.  
  205.  
  206. -- part 23 (button)
  207. -- low flags: 00
  208. -- high flags: 0004
  209. -- rect: left=209 top=312 right=335 bottom=242
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 1014 / 1014
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: New Button
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   push card
  221.   hide card field id 20
  222.   go to card id 17640
  223. end mouseUp
  224.  
  225.  
  226.  
  227.  
  228. -- part 24 (button)
  229. -- low flags: 00
  230. -- high flags: 0004
  231. -- rect: left=242 top=312 right=335 bottom=272
  232. -- title width / last selected line: 0
  233. -- icon id / first selected line: 1013 / 1013
  234. -- text alignment: 1
  235. -- font id: 0
  236. -- text size: 12
  237. -- style flags: 0
  238. -- line height: 16
  239. -- part name: New Button
  240. ----- HyperTalk script -----
  241. on mouseUp
  242.   push card
  243.   hide card field id 20
  244.   go to card id 20989
  245. end mouseUp
  246.  
  247.  
  248.  
  249.  
  250. -- part 25 (field)
  251. -- low flags: 00
  252. -- high flags: 2004
  253. -- rect: left=284 top=6 right=28 bottom=498
  254. -- title width / last selected line: 0
  255. -- icon id / first selected line: 0 / 0
  256. -- text alignment: 0
  257. -- font id: 21
  258. -- text size: 10
  259. -- style flags: 0
  260. -- line height: 13
  261. -- part name: 
  262.  
  263.  
  264. -- part 26 (button)
  265. -- low flags: 00
  266. -- high flags: 0000
  267. -- rect: left=287 top=8 right=25 bottom=313
  268. -- title width / last selected line: 0
  269. -- icon id / first selected line: 6460 / 6460
  270. -- text alignment: 1
  271. -- font id: 0
  272. -- text size: 12
  273. -- style flags: 0
  274. -- line height: 16
  275. -- part name: New Button
  276.  
  277.  
  278. -- part 27 (button)
  279. -- low flags: 00
  280. -- high flags: 0000
  281. -- rect: left=458 top=42 right=66 bottom=483
  282. -- title width / last selected line: 0
  283. -- icon id / first selected line: 26635 / 26635
  284. -- text alignment: 1
  285. -- font id: 0
  286. -- text size: 12
  287. -- style flags: 0
  288. -- line height: 16
  289. -- part name: New Button
  290. ----- HyperTalk script -----
  291. on mouseUp
  292.   show card field id 25
  293.   show card button id 26
  294.   show card field id 20
  295. end mouseUp
  296.  
  297.  
  298.  
  299. -- part contents for card part 20
  300. ----- text -----
  301. MacMainFrame 3270 provides 3278/79 terminal emulation. The terminal emulation screen is shown in typical MacIntosh-white background, or may be user defined as IBM-black background. An IBM status line, which shows operating and status messages from the IBM host, is anchored so it is always on any screen size.
  302.  
  303. -- part contents for card part 25
  304. ----- text -----
  305.          Click on pull down menus for more info...